home *** CD-ROM | disk | FTP | other *** search
/ MPEG Archives / MPEG Archives.iso / mpeg / files / u16.dfm / u16.txt < prev   
Text File  |  1996-12-28  |  3KB  |  140 lines
  1. object Form1: TForm1
  2.   Left = 118
  3.   Top = 79
  4.   BorderStyle = bsNone
  5.   Caption = 'Form1'
  6.   ClientHeight = 349
  7.   ClientWidth = 460
  8.   Font.Color = clWindowText
  9.   Font.Height = -13
  10.   Font.Name = 'System'
  11.   Font.Style = []
  12.   PixelsPerInch = 96
  13.   Position = poScreenCenter
  14.   OnCreate = FormCreate
  15.   TextHeight = 16
  16.   object flb1: TFileListBox
  17.     Left = 280
  18.     Top = 72
  19.     Width = 145
  20.     Height = 97
  21.     ItemHeight = 13
  22.     Mask = '*.bmp'
  23.     TabOrder = 0
  24.     Visible = False
  25.   end
  26.   object Panel2: TPanel
  27.     Left = 0
  28.     Top = 0
  29.     Width = 460
  30.     Height = 349
  31.     Align = alClient
  32.     BevelInner = bvLowered
  33.     BorderWidth = 3
  34.     BorderStyle = bsSingle
  35.     Caption = 'Panel2'
  36.     TabOrder = 1
  37.     object Image2: TImage
  38.       Left = 5
  39.       Top = 5
  40.       Width = 448
  41.       Height = 337
  42.       Align = alClient
  43.       Picture.Data = {<image000.bmp>}
  44.       OnMouseMove = Image2MouseMove
  45.     end
  46.     object Label2: TLabel
  47.       Left = 389
  48.       Top = 300
  49.       Width = 29
  50.       Height = 16
  51.       Caption = 'EXIT'
  52.       Font.Color = clGray
  53.       Font.Height = -13
  54.       Font.Name = 'Arial'
  55.       Font.Style = [fsBold]
  56.       ParentFont = False
  57.       Transparent = True
  58.       OnClick = Label2Click
  59.       OnMouseMove = Label2MouseMove
  60.     end
  61.     object Label1: TLabel
  62.       Left = 387
  63.       Top = 260
  64.       Width = 34
  65.       Height = 16
  66.       Caption = 'PLAY'
  67.       Font.Color = clGray
  68.       Font.Height = -13
  69.       Font.Name = 'Arial'
  70.       Font.Style = [fsBold]
  71.       ParentFont = False
  72.       Transparent = True
  73.       OnClick = Label1Click
  74.       OnMouseMove = Label1MouseMove
  75.     end
  76.     object Label3: TLabel
  77.       Left = 387
  78.       Top = 215
  79.       Width = 34
  80.       Height = 16
  81.       Caption = 'VIEW'
  82.       Font.Color = clGray
  83.       Font.Height = -13
  84.       Font.Name = 'Arial'
  85.       Font.Style = [fsBold]
  86.       ParentFont = False
  87.       Transparent = True
  88.       OnClick = Label3Click
  89.       OnMouseMove = Label3MouseMove
  90.     end
  91.     object DLB: TDirectoryListBox
  92.       Left = 24
  93.       Top = 120
  94.       Width = 129
  95.       Height = 20
  96.       ItemHeight = 16
  97.       TabOrder = 1
  98.       Visible = False
  99.       OnChange = DLBChange
  100.     end
  101.     object Panel1: TPanel
  102.       Left = 8
  103.       Top = 8
  104.       Width = 105
  105.       Height = 105
  106.       BevelOuter = bvNone
  107.       Caption = 'Panel1'
  108.       Color = clBlack
  109.       TabOrder = 0
  110.       object Image1: TImage
  111.         Left = 0
  112.         Top = 0
  113.         Width = 105
  114.         Height = 105
  115.         Center = True
  116.       end
  117.     end
  118.   end
  119.   object flb2: TFileListBox
  120.     Left = 24
  121.     Top = 144
  122.     Width = 129
  123.     Height = 169
  124.     Color = clTeal
  125.     Ctl3D = True
  126.     DragCursor = crCross
  127.     ItemHeight = 13
  128.     Mask = '*.mpg'
  129.     ParentCtl3D = False
  130.     TabOrder = 2
  131.     Visible = False
  132.   end
  133.   object Timer1: TTimer
  134.     Interval = 100
  135.     OnTimer = Timer1Timer
  136.     Left = 248
  137.     Top = 104
  138.   end
  139. end
  140.